home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / LORD2B6.ZIP / TRAINING.REF < prev    next >
Text File  |  1997-05-16  |  3KB  |  172 lines

  1. ;the training ref
  2.  
  3. `p01 - Experience
  4. `p02 - Hit points
  5. `p03 - Hit point max
  6. `p04 - Muscle
  7. `p05 - Dodge
  8. `p06 - Quest 1 stat - >0, picked berries
  9. `p07 - Alignment (negetive is evil)
  10. `p08 - Charm
  11. `p09 - Level
  12.  
  13. @#WIN
  14.  
  15. @do `p21 is 5
  16. @do `p03 + `p21
  17.  
  18. @do `p22 is 2
  19. @do `p04 + `p22
  20.  
  21. @do `p23 is 1
  22. @do `p05 + `p23
  23.  
  24.  
  25. @do `p09 + 1
  26.  
  27. @do addlog
  28.   `r4  `r0 `0`n`2 has beaten `0`e`2 and become level `p09! `r4  `r0
  29. @writefile lognow.txt
  30.                                  `2-`0=`2-`%=`2-`0=`2-
  31. @do `p02 is `p03
  32. @show
  33. `r0`c  `r1 YOU HAVE FACED YOUR DARKEST FEAR AND TRIUMPHED! `r0 
  34.  
  35.   `2You wake up well rested.
  36.  
  37.   `%YOU ARE NOW LEVEL `p09.
  38.  
  39.   `2You gain `0`p21`2 hitpoints,`0 `p22`2 muscle and `0`p23`2 dodge.
  40.  
  41. `k
  42. @run barak in gshops.ref
  43.  
  44. @#DIE
  45. @do `p02 is 1
  46. @do `t04 is 1 
  47. @show
  48. `r0`c  `r4 YOUR NIGHTMARE HAS BESTED YOU `r0 
  49.  
  50.   `2You wake up screaming to find four men holding you down.
  51.  
  52.   You have failed.
  53.  
  54. `k
  55. @run barak in gshops.ref
  56.  
  57. @#WAKEUP
  58. @do `t04 is 1 
  59. @show
  60. `r0`c  `r4 YOU ESCAPE - THE ONLY WAY YOU KNOW HOW `r0 
  61.  
  62.   `2You suddenly sit up in bed.  Wiping the beads of sweat from your brow,
  63.   you wonder how you could have thought you were ready for this...
  64.  
  65. `k
  66. @run barak in gshops.ref
  67.  
  68. @#arena1
  69. @show
  70. `c  `r1                           `4SKY WORLD                           `r0
  71.  
  72.   `9Your body shoots up through the roof at an incredible speed - you gasp
  73.   as your head pokes through a wall of clouds.
  74.  
  75.   You gently land on a soft bed of white.  What a ride!
  76.  
  77. @
  78.  
  79.  
  80. @#arena2
  81. @show
  82. `c  `r1                           `4BACKYARD                            `r0
  83.  
  84.   `2You see your house... wait, those berries look familiar.  You are in 
  85.   your own backyard.  You squint into the sun, you are not alone.
  86.  
  87. @
  88.  
  89. @#arena3
  90. @show
  91. `c  `r1                           `4SWAMP                              `r0
  92.  
  93.   `2You open your eyes to find green spongy soil beneath your feet.  Awful
  94.   smells waft up from the dark and mysterious waters nearby.
  95.  
  96. @
  97.  
  98.  
  99.  
  100.  
  101. @#master1
  102. @show
  103.   A cackling laughter draws your attention - a blindingly white skeleton
  104.   is casually juggling bones nearby.  He sees you and roars in fury!
  105.  
  106. `k
  107. @fight
  108. ;name
  109. Skeleton Warrior
  110. ;string said when you see him
  111. The thing whips out its bone and lunges at you!
  112. ;power move kill string
  113. Unfortunatly the thing had to split - be split, rather.
  114. ;sex - 1 is male, 2 is female, 3 is it
  115. 3
  116. ;weapon and strength for the weapon, up to 5
  117. cackles a death chant|`p22
  118. bites you|`p22
  119. painfully prods you|`p22
  120. NONE|NONE
  121. NONE|NONE
  122. ;defense
  123. `p23
  124. ;gold reward
  125. 0
  126. ;experience
  127. 0
  128. ;hit points
  129. `p21
  130. ;if win: ref file|name or NONE
  131. TRAINING.REF|WIN
  132. ;if lose: ref file|name or NONE
  133. TRAINING.REF|DIE
  134. ;if runs: ref file|name or NONE
  135. TRAINING.REF|WAKEUP
  136. @closescript
  137.  
  138.  
  139.  
  140.  
  141. @#startfight
  142.  
  143. ;do math to create monster
  144.  
  145. @do `p21 is `p03
  146. @do `p25 is `p09
  147. ;@do `p25 * `p25
  148. @do `p25 random `p25
  149. @do `p21 + `p25
  150.  
  151. @do `p22 is S&wep_num
  152. @do `p22 + `p04
  153.  
  154. @do `p23 is S&arm_num
  155. @do `p23 + `p05
  156.  
  157. @do `p24 random `p22
  158. @do `p21 + `p24
  159.  
  160. @do `p24 random `p22
  161. @do `p24 / 5
  162. @do `p22 - `p24
  163.  
  164.  
  165. ;pick arena
  166. @do `p20 random 3 1
  167. @routine arena`p20
  168. ;pick master
  169. @do `p20 random 1 1
  170. @routine master`p20
  171. @#closescript
  172.